home *** CD-ROM | disk | FTP | other *** search
/ Shareware Extravaganza - Disc 1 / ShareWare Extravaganza 1 of 4 (The Ultimate Shareware Company).iso / grprogs / picutil.exe / ALTER.SRC / PUBLICS.ASM < prev    next >
Assembly Source File  |  1986-10-16  |  5KB  |  144 lines
  1. ;╔═════════════════════════════════════════════════════════════════════════════╗
  2. ;║ ░░░░░░░░░░░ PROGRAM = PUBLICS.ASM ░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░ ║
  3. ;╚═════════════════════════════════════════════════════════════════════════════╝
  4. CSEG          SEGMENT  PUBLIC BYTE
  5.            ASSUME  CS:CSEG
  6.            INCLUDE PUBLICS.EQU
  7.            INCLUDE STRUC.EQU
  8.  
  9.            PUBLIC  BAS_HEADER
  10.            PUBLIC  BUFF_SIZE
  11.            PUBLIC  COLOR
  12.            PUBLIC  COLOR_TABLE
  13.            PUBLIC  CUT_HEADER
  14.            PUBLIC  DISK_BUFFER
  15.            PUBLIC  FILENAME
  16.            PUBLIC  FILE_TYPE
  17.            PUBLIC  FILE_SIZE
  18.            PUBLIC  FLAGS
  19.            PUBLIC  HANDLE_IN
  20.            PUBLIC  HANDLE_OUT
  21.            PUBLIC  HEIGHT_PIX
  22.            PUBLIC  IMG_HEADER
  23.            PUBLIC  MSP_HEADER
  24.            PUBLIC  OPTIONS
  25.            PUBLIC  PGA_HEADER
  26.            PUBLIC  PEL_SIZE
  27.            PUBLIC  PIC_HEADER
  28.            PUBLIC  PIG_HEADER
  29.            PUBLIC  PROG_END
  30.            PUBLIC  RAS_HEADER
  31.            PUBLIC  READ_PROG
  32.            PUBLIC  STACK
  33.            PUBLIC  TYPE_FROM
  34.            PUBLIC  TYPE_TO
  35.            PUBLIC  WIDTH_BYTES
  36.            PUBLIC  WIDTH_PIX
  37.            PUBLIC  WRITE_PROG
  38.  
  39.            EXTRN   BAS_IN:NEAR
  40.            EXTRN   BAS_READ:NEAR
  41.            EXTRN   RAS_IN:NEAR
  42.            EXTRN   PIC_IN:NEAR
  43.            EXTRN   PIC_READ:NEAR
  44.            EXTRN   PGA_OUT:NEAR
  45.            EXTRN   PGA_WRITE:NEAR
  46.            EXTRN   IMG_IN:NEAR
  47.            EXTRN   IMG_OUT:NEAR
  48.            EXTRN   IMG_WRITE:NEAR
  49.            EXTRN   IMG_READ:NEAR
  50.            EXTRN   MSP_IN:NEAR
  51.            EXTRN   MSP_OUT:NEAR
  52.            EXTRN   CUT_IN:NEAR
  53.            EXTRN   CUT_OUT:NEAR
  54.            EXTRN   CUT_READ:NEAR
  55.            EXTRN   CUT_WRITE:NEAR
  56.            EXTRN   PIG_IN:NEAR
  57.            EXTRN   PIG_OUT:NEAR
  58.            EXTRN   PIG_READ:NEAR
  59.            EXTRN   READ_RAW:NEAR
  60.            EXTRN   WRITE_RAW:NEAR
  61. ;┌─────────────────────────────────────────────────────────────────────────────┐
  62. ;│           FILE INFO                               │
  63. ;└─────────────────────────────────────────────────────────────────────────────┘
  64. FILENAME       DB      128 DUP (0)
  65. HANDLE_IN      DW      0
  66. HANDLE_OUT     DW      0
  67. TYPE_FROM      DW      0               ;POINTS TO TYPE IN FILENAME
  68. TYPE_TO        DB      'IMG'                   ;WHAT TO CONVERT TO
  69. OPTIONS        DB      '........'              ;OPTIONS
  70. ;┌─────────────────────────────────────────────────────────────────────────────┐
  71. ;│           COMMON PARAMETERS                           │
  72. ;└─────────────────────────────────────────────────────────────────────────────┘
  73. WIDTH_PIX      DW      0               ;WIDTH IN PIXELS
  74. WIDTH_BYTES    DW      0               ;WIDTH IN BYTES
  75. HEIGHT_PIX     DW      0               ;HEIGHT IN PIXELS
  76. COLOR           DW      0               ;COLOR
  77. PEL_SIZE       DW      1               ;PIXELS PER PEL
  78. ;┌─────────────────────────────────────────────────────────────────────────────┐
  79. ;│           TYPE OF FILES                               │
  80. ;└─────────────────────────────────────────────────────────────────────────────┘
  81. FILE_TYPE      LABEL   BYTE
  82.            DB      'IMG'
  83.            DW      OFFSET IMG_IN,OFFSET IMG_OUT
  84.            DW      OFFSET IMG_HEADER
  85.            DW      OFFSET IMG_READ,OFFSET IMG_WRITE
  86.            DB      'PIG'
  87.            DW      OFFSET PIG_IN,OFFSET PIG_OUT
  88.            DW      OFFSET PIG_HEADER
  89.            DW      OFFSET PIG_READ,OFFSET WRITE_RAW
  90.            DB      'MSP'
  91.            DW      OFFSET MSP_IN,OFFSET MSP_OUT
  92.            DW      MSP_HEADER
  93.            DW      OFFSET READ_RAW,OFFSET WRITE_RAW
  94.            DB      'PGA'
  95.            DW      0,OFFSET PGA_OUT
  96.            DW      OFFSET PGA_HEADER
  97.            DW      0,OFFSET PGA_WRITE
  98.            DB      'CUT'
  99.            DW      OFFSET CUT_IN,OFFSET CUT_OUT
  100.            DW      OFFSET CUT_HEADER
  101.            DW      OFFSET CUT_READ,OFFSET CUT_WRITE
  102.            DB      'BAS'
  103.            DW      OFFSET BAS_IN,0
  104.            DW      OFFSET BAS_HEADER
  105.            DW      OFFSET BAS_READ,0
  106.            DB      'PIC'
  107.            DW      OFFSET PIC_IN,0
  108.            DW      OFFSET PIC_HEADER
  109.            DW      OFFSET PIC_READ,0
  110.            DB      'RAS'
  111.            DW      OFFSET RAS_IN,0
  112.            DW      OFFSET RAS_HEADER
  113.            DW      OFFSET READ_RAW,0
  114.  
  115. END_OF_FILE    DB      0
  116.  
  117. PIG_HEADER     PIG<>
  118. IMG_HEADER     IMG<>
  119. MSP_HEADER     MSP<>
  120. PGA_HEADER     PGA<>
  121. CUT_HEADER     CUT<>
  122. PIC_HEADER     PIC<>
  123. BAS_HEADER     BAS<>
  124. RAS_HEADER     RAS<>
  125.  
  126. COLOR_TABLE    DB      1280 DUP(?)           ;
  127.  
  128. FLAGS           DW      0               ;OPTION FLAGS
  129. READ_PROG      DW      0               ;HOW TO READ FILE DATA
  130. WRITE_PROG     DW      0               ;HOW TO WRITE FILE DATA
  131. DISK_BUFFER    DW      0               ;DISK BUFFER OFFSET
  132.            DW      0               ;DISK BUFFER SEGMENT
  133. FILE_SIZE      DW      0               ;FILE SIZE
  134.            DW      0               ;
  135. BUFF_SIZE      DW      8000H               ;
  136. ;╔═════════════════════════════════════════════════════════════════════════════╗
  137. ;╚═════════════════════════════════════════════════════════════════════════════╝
  138.            DB      64 DUP('STACK')
  139. STACK           EQU     $
  140. PROG_END       EQU     $
  141. CSEG           ENDS
  142.            END
  143.  
  144.